﻿Public Class Tipo_EntrevistaFalloAlta
    Inherits ExceptionManager

    Public Sub New(innerException As System.Exception)
        MyBase.New("Error durante el alta del Tipo_Entrevista")
        Me.codigo = Utils.Enumeradores.Excepeciones.Tipo_EntrevistaFalloAlta
        Me.tipo = MsgBoxStyle.Exclamation
        Me.mensaje = "Error durante el alta del Tipo_Entrevista"
        Me.innerException2 = innerException
    End Sub
End Class

Public Class Tipo_EntrevistaFalloEditar
    Inherits ExceptionManager

    Public Sub New(innerException As System.Exception)
        MyBase.New("Error durante la actualización del Tipo_Entrevista")
        Me.codigo = Utils.Enumeradores.Excepeciones.Tipo_EntrevistaFalloEditar
        Me.tipo = MsgBoxStyle.Exclamation
        Me.mensaje = "Error durante la actualización del Tipo_Entrevista"
        Me.innerException2 = innerException
    End Sub
End Class

Public Class Tipo_EntrevistaFalloBaja
    Inherits ExceptionManager

    Public Sub New(innerException As System.Exception)
        MyBase.New("Error durante la baja del Tipo_Entrevista")
        Me.codigo = Utils.Enumeradores.Excepeciones.Tipo_EntrevistaFalloEliminar
        Me.tipo = MsgBoxStyle.Exclamation
        Me.mensaje = "Error durante la baja del Tipo_Entrevista"
        Me.innerException2 = innerException
    End Sub
End Class

Public Class Tipo_EntrevistaFalloBuscar
    Inherits ExceptionManager

    Public Sub New(innerException As System.Exception)
        MyBase.New("Error durante la búsqueda del Tipo_Entrevista")
        Me.codigo = Utils.Enumeradores.Excepeciones.Tipo_EntrevistaFalloBuscar
        Me.tipo = MsgBoxStyle.Exclamation
        Me.mensaje = "Error durante la búsqueda del Tipo_Entrevista"
        Me.innerException2 = innerException
    End Sub
End Class

Public Class Tipo_EntrevistaFalloConsultar
    Inherits ExceptionManager

    Public Sub New(innerException As System.Exception)
        MyBase.New("Error durante la consulta de Tipo_Entrevistas")
        Me.codigo = Utils.Enumeradores.Excepeciones.Tipo_EntrevistaFalloConsultar
        Me.tipo = MsgBoxStyle.Exclamation
        Me.mensaje = "Error durante la consulta de Tipo_Entrevistas"
        Me.innerException2 = innerException
    End Sub
End Class
